function [Element,Table,Description, Units, Sampling, Missing, times, dates, values, qualifier,description,Name,fday] = readFiles(fileName)

  %displaying information about current element
  disp(['Header parsing, file ' fileName]);
  Name=fileName;
  [Skip]= textread(fileName,'%s',15,'whitespace','\n');
  Element=strrep(char(Skip(7)),'#Element: ','') 
  Table=strrep(char(Skip(8)),'#Table: ','')
  Description=strrep(char(Skip(9)),'#Description: ','')
  Units= strrep(char(Skip(10)),'#Measure units: ','')
  Sampling =strrep(char(Skip(14)),'#Sampling: ','')
  z = char(Skip(15));
  disp(z);
  Missing=strrep(char(Skip(15)),'#Missing value: ','');

    %filling the arays  
  [dates, times, values, qualifier, description] = textread(fileName, '%s %s %f %q %q','commentstyle','shell');
  [dummy,dummy,dummy,hr,mn,sc] = datevec(times);
  [yr,mt,dy] = datevec(dates);
  fday = datenum(yr,mt,dy,hr,mn,sc) - datenum(2000,1,1);
  
  
  